home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Special 25 / AMIGAplus Sonderheft 25 (2000)(Falke)(DE)(Track 1 of 4)[!].iso / Vollversion / Archive / DMS-Script < prev    next >
Text File  |  2000-05-08  |  2KB  |  70 lines
  1. ; **** DMS-Entpackerskript der Amiga-Future-CD-ROM © Cord Hagen ****
  2.  
  3. IF EXISTS ENV:ASSAFCD
  4. SKIP PLAY
  5. ENDIF
  6. ALIAS BLACK "ECHO *"*E[>1m*E[30;41m*E[0;0H*E[J""
  7. BLACK
  8. ECHO "*n Die AMIGA-FUTURE-CD-ROM ist NICHT angemeldet."
  9. ECHO " Starten Sie bitte zunächst -> QUICKSTART <- im Hauptverzeichnis dieser CD-ROM."
  10. ECHO " Erst danach können Sie DMS-Archive von der CD dekomprimieren ...."
  11. WAIT 8
  12. SKIP EXIT
  13. LAB PLAY
  14. ASSIGN DMSSOURCE: "" ADD
  15. ALIAS BLACK "ECHO *"*E[>1m*E[30;41m*E[0;0H*E[J""
  16. BLACK
  17. ECHO "*n Dieses DMS-Archiv wird nun auf eine Diskette entpackt !"
  18. ECHO " Bitte entsprechend der Anzahl an DMS-Archiven in diesem Ordner"
  19. ECHO " Disketten bereithalten !   -    Drücken Sie bitte die linke Maustaste !"
  20. CURSOR OFF
  21. LMB
  22. ECHO ""
  23. WAIT 1
  24. ECHO ""
  25. WAIT 1
  26. ECHO ""
  27. WAIT 1
  28. ECHO ""
  29. BLACK
  30. ECHO "*n ACHTUNG ! Alle Daten auf einer Diskette, auf die ein DMS-Archiv"
  31. ECHO " entpackt wird, gehen verloren !"
  32. ECHO " Auf welches Diskettenlaufwerk soll entpackt werden ?"
  33. SETENV AFCDCHK=DF0:
  34. REQUESTCHOICE >ENV:AFCDCHK TITLE "Future © DMS-Entpacker""Auf welches Diskettenlaufwerk soll*ndas DMS-Archiv entpackt werden ?" DF0: DF1: Abbrechen
  35. IF $AFCDCHK EQ 0
  36.  SKIP ABBRUCH
  37. ENDIF
  38. IF $AFCDCHK EQ 1
  39.  SETENV AFCDCHK=DF0:
  40. ENDIF
  41. IF $AFCDCHK EQ 2
  42.  SETENV AFCDCHK=DF1:
  43. ENDIF
  44. BLACK
  45. ECHO "*n Ich entpacke jetzt das DMS-Archiv auf eine Diskette, die sich im Laufwerk ...."
  46. ECHO " -> " $AFCDCHK " <- befinden muß !"
  47. ECHO "Bitte die linke Maustaste drücken, wenn es losgehen kann !"
  48. CURSOR OFF
  49. LMB
  50. ECHO "Entpacke DMS-Archiv, - bitte warten ...."
  51. DMS WRITE DMSSOURCE:ARCHIV.DMS TO $AFCDCHK
  52. BLACK
  53. ECHO "*n Das DMS-Archiv wurde auf die Diskette in Laufwerk ...."
  54. ECHO " -> " $AFCDCHK " <- entpackt. - Fenster wird geschlossen ...."
  55. WAIT 4
  56. ECHO " Tschüß ...."
  57. SKIP ENDE
  58. LAB ABBRUCH
  59. BLACK
  60. ECHO "*n Der Entpackvorgang wurde manuell abgebrochen !"
  61. ECHO " Es wurden KEINE Daten auf einen Datenträger entpackt."
  62. ECHO " Das Fenster wird geschlossen ...."
  63. CURSOR OFF
  64. WAIT 8
  65. ECHO " Tschüß ...."
  66. LAB ENDE
  67. ASSIGN DMSSOURCE: "" REMOVE
  68. DELETE ENV:AFCDCHK >NIL:
  69. LAB EXIT
  70.